home *** CD-ROM | disk | FTP | other *** search
- echo off
- set temp=xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
- if "%temp"=="" goto outofenv
- set temp=
- goto doit
- :outofenv
- echo Sorry -- there is not enough DOS environment space to continue with
- echo installation. If you are running Windows, exit Windows and try again.
- echo If you're not running Windows, you can either increase your environment
- echo size or install manually. To increase your environment size under DOS
- echo 3.2 and later, include a line similar to
- echo SHELL=C:\COMMAND.COM /e:1024 /p
- echo in your CONFIG.SYS file, then reboot your computer.
- echo To install manually, see INSTALL.DOC.
- goto fin
- :doit
- getans Are you updating Ample Notice from a previous version? (Y,N)
- if not errorlevel 1 goto version
- echo See the file AN2TO3.DOC for update instructions. Would you like
- getans to print this file (just a couple of pages) now? (Y,N)
- if not errorlevel 1 goto display
- echo Turn on printer and
- pause
- printman an2to3.doc
- goto update
- :display
- echo Update instructions will be displayed on the screen. To view
- echo these instructions later, enter PAGE AN2TO3.DOC. To obtain a
- echo printed version, enter PRINTMAN AN2TO3.DOC.
- pause
- PAGE AN2TO3.DOC
- :update
- getans Continue with installation? (Y,N)
- if errorlevel 1 goto version
- goto fin
- :version
- getans ~V
- if errorlevel 1 goto 5
- echo Sorry! Automatic installation does not work on DOS 3.0. Please type
- echo PAGE INSTALL.DOC to see how to install Ample Notice yourself.
- goto fin
- :5
- set h=y
- if "%1"=="" goto noarg
- set s=%1
- goto 110
- :noarg
- rem No argument given; get it...
- getans ~A On which disk will Ample Notice be installed? (A,B,...)
- if errorlevel 2 goto 20
- set d=A:
- goto 100
- :20
- if errorlevel 3 goto 30
- set d=B:
- goto 100
- :30
- if errorlevel 4 goto 40
- set d=C:
- goto 100
- :40
- if errorlevel 5 goto 50
- set d=D:
- goto 100
- if errorlevel 6 goto 5
- :50
- set d=E:
- :100
- set s=%d%
- rem is it a hard drive?
- getans Is %d% a hard drive? (Y,N)
- if errorlevel 1 goto 105
- set h=n
- goto 110
- :105
- set s=%d%\AN3
- :110
- echo Ample Notice will be installed in %s%.
- getans OK? (Y,N)
- if errorlevel 1 goto copy
- echo Type ANSETUP again, followed by the drive and subdirectory you wish to
- echo use. Example: ANSETUP B: or ANSETUP C:\CAL
- goto fin
- :copy
- rem copy files
- if %h%==n goto 115
- echo Ignore 'Unable to create directory' message...
- md %s%
- :115
- echo off
- echo Select printer type:
- echo .
- echo 1. Epson 9-pin or compatible
- echo 2. Epson 24-pin or compatible
- echo 3. HP LaserJet or compatible
- echo 4. Okidata microline 192
- echo 5. IBM Proprinter (9-pin)
- echo 6. Toshiba
- echo 7. Other (If you choose this option, edit CONFIG.CAL later to describe your
- echo printer. Until you do this, only limited printing will be available.)
- echo .
- getans ~N Enter number:
- if errorlevel 2 goto 520
- goto 500
- :520
- if errorlevel 3 goto 530
- echo ;Epson 24-pin >>%s%\config.cal
- echo Prefix 3,27,83,1,27,51,15,15 >>%s%\config.cal
- echo Prefix 4,27,83,1,27,51,15,15 >>%s%\config.cal
- goto 500
- :530
- if errorlevel 4 goto 540
- echo ;LaserJet II and compatible >>%s%\config.cal
- echo Dimensions 1,80,80,6,2 >>%s%\config.cal
- echo Prefix 1,27,69,27,40,115,51,84,27,38,108,56,68,27,40,49,48,85,27,40,115,49,50,72 >>%s%\config.cal
- echo Reset 1,27,69 >>%s%\config.cal
- echo HeaderStart 1,27,40,115,49,83 >>%s%\config.cal
- echo HeaderEnd 1,27,40,115,48,83 >>%s%\config.cal
- echo Dimensions 2,120,80,6,3 >>%s%\config.cal
- echo Reset 2,27,69 >>%s%\config.cal
- echo Prefix 2,27,69,27,40,115,48,116,49,54,46,54,54,72,27,40,49,48,85,27,38,108,56,68 >>%s%\config.cal
- echo HeaderStart 2,27,38,100,48,68 >>%s%\config.cal
- echo HeaderEnd 2,27,38,100,64 >>%s%\config.cal
- echo Dimensions 3,120,96,6,3 >>%s%\config.cal
- echo Reset 3,27,69 >>%s%\config.cal
- echo Prefix 3,27,69,27,40,115,48,116,49,54,46,54,54,72,27,40,49,48,85,27,38,108,53,67 >>%s%\config.cal
- echo HeaderStart 3,27,38,100,48,68 >>%s%\config.cal
- echo HeaderEnd 3,27,38,100,64 >>%s%\config.cal
- echo Dimensions 4,91,65,6,2 >>%s%\config.cal
- echo Reset 4,27,69 >>%s%\config.cal
- echo Prefix 4,27,69,27,40,115,48,116,49,54,46,54,54,72,27,40,49,48,85,27,38,108,53,67 >>%s%\config.cal
- echo HeaderStart 4,27,38,100,48,68 >>%s%\config.cal
- echo HeaderEnd 4,27,38,100,64 >>%s%\config.cal
- goto 500
- :540
- if errorlevel 5 goto 550
- echo ;Okidata Microline 192 >>%s%\config.cal
- echo HeaderStart 1,27,33,47 >>%s%\config.cal
- echo HeaderEnd 1,27,33,42 >>%s%\config.cal
- echo Prefix 1,28,27,49,27,33,50 >>%s%\config.cal
- echo Dimensions 1,82,60,7,2 >>%s%\config.cal
- echo Reset 1,27,24 >>%s%\config.cal
- echo HeaderStart 2,27,33,47 >>%s%\config.cal
- echo HeaderEnd 2,27,33,42 >>%s%\config.cal
- echo Prefix 2,29,27,56,27,33,50 >>%s%\config.cal
- echo Dimensions 2,120,88,8,3 >>%s%\config.cal
- echo Reset 2,27,24 >>%s%\config.cal
- echo HeaderStart 3,27,33,47 >>%s%\config.cal
- echo HeaderEnd 3,27,33,42 >>%s%\config.cal
- echo Prefix 3,29,27,37,57,12,27,33,50 >>%s%\config.cal
- echo Dimensions 3,120,115,8,3 >>%s%\config.cal
- echo Reset 3,27,24 >>%s%\config.cal
- echo HeaderStart 4,27,33,47 >>%s%\config.cal
- echo HeaderEnd 4,27,33,42 >>%s%\config.cal
- echo Prefix 4,29,27,37,57,12,27,33,50 >>%s%\config.cal
- echo Dimensions 4,92,78,8,2 >>%s%\config.cal
- echo Reset 4,27,24 >>%s%\config.cal
- goto 500
- :550
- if errorlevel 6 goto 560
- echo ;IBM Proprinter >>%s%\config.cal
- echo HeaderStart 1,27,45,1 >>%s%\config.cal
- echo HeaderEnd 1,27,45,0 >>%s%\config.cal
- echo HeaderStart 2,27,45,1 >>%s%\config.cal
- echo HeaderEnd 2,27,45,0 >>%s%\config.cal
- echo HeaderStart 3,27,45,1 >>%s%\config.cal
- echo HeaderEnd 3,27,45,0 >>%s%\config.cal
- echo HeaderStart 4,27,45,1 >>%s%\config.cal
- echo HeaderEnd 4,27,45,0 >>%s%\config.cal
- goto 500
- :560
- if errorlevel 7 goto 570
- echo ;Toshiba >>%s%\config.cal
- echo BorderStyle 0 >>%s%\config.cal
- echo Dimensions 1,80,60,6,2 >>%s%\config.cal
- echo Prefix 1,27,42,49 >>%s%\config.cal
- echo Reset 1,12,27,26,73 >>%s%\config.cal
- echo HeaderStart 1,27,73 >>%s%\config.cal
- echo HeaderEnd 1,27,74 >>%s%\config.cal
-
- echo Dimensions 2,80,80,6,2 >>%s%\config.cal
- echo Prefix 2,27,42,49,27,30,6 >>%s%\config.cal
- echo Reset 2,12,27,26,73 >>%s%\config.cal
- echo HeaderStart 2,27,73 >>%s%\config.cal
- echo HeaderEnd 2,27,74 >>%s%\config.cal
-
- echo Dimensions 3,120,80,6,3 >>%s%\config.cal
- echo Prefix 3,27,42,48,27,91,27,30,6 >>%s%\config.cal
- echo Reset 3,12,27,26,73 >>%s%\config.cal
- echo HeaderStart 3,27,73 >>%s%\config.cal
- echo HeaderEnd 3,27,74 >>%s%\config.cal
-
- echo Dimensions 4,85,55,6,2 >>%s%\config.cal
- echo Prefix 4,27,42,48,27,91,27,30,6 >>%s%\config.cal
- echo Reset 4,12,27,26,73 >>%s%\config.cal
- echo HeaderStart 4,27,73 >>%s%\config.cal
- echo HeaderEnd 4,27,74 >>%s%\config.cal
- goto 500
- :570
- if errorlevel 8 goto 115
- echo ;Generic (probably needs editing) >>%s%\config.cal
- echo BorderStyle 0 >>%s%\config.cal
- echo Dimensions 1,66,60,4,2 >>%s%\config.cal
- echo Prefix 1 >>%s%\config.cal
- echo Reset 1,12 >>%s%\config.cal
- echo HeaderStart 1 >>%s%\config.cal
- echo HeaderEnd 1 >>%s%\config.cal
- echo Dimensions 2,66,60,4,2 >>%s%\config.cal
- echo Prefix 2 >>%s%\config.cal
- echo Reset 2,12 >>%s%\config.cal
- echo HeaderStart 2 >>%s%\config.cal
- echo HeaderEnd 2 >>%s%\config.cal
- echo Dimensions 3,66,60,4,2 >>%s%\config.cal
- echo Prefix 3 >>%s%\config.cal
- echo Reset 3,12 >>%s%\config.cal
- echo HeaderStart 3 >>%s%\config.cal
- echo HeaderEnd 3 >>%s%\config.cal
- echo Dimensions 4,66,60,4,2 >>%s%\config.cal
- echo Prefix 4 >>%s%\config.cal
- echo Reset 4,12 >>%s%\config.cal
- echo HeaderStart 4 >>%s%\config.cal
- echo HeaderEnd 4 >>%s%\config.cal
- :500
- echo Notes %s%\notes >>%s%\config.cal
- echo Archive %s%\archive.cal >>%s%\config.cal
- echo HelpFile %s%\an.hlp >>%s%\config.cal
- copy an.exe %s%
- copy alarm.com %s%
- copy an.hlp %s%
- if exist %s%\notes goto 6
- getans Do you want dates in European format (day/month/year)? (Y,N)
- if not errorlevel 1 goto copynotes
- copy notes.eur %s%\notes
- echo European >>%s%\config.cal
- goto 125
- :copynotes
- copy notes %s%
- goto 125
- :6
- echo The file %s%\NOTES already exists and will not be overwritten. You may
- echo need to change your NOTES file; see READ.ME for details.
- pause
- :125
- rem copy other pertinent files
- copy aninst.exe %s%
- if %h%==n goto 126
- rem This is a hard drive -- let's copy documentation, etc.
- copy an.doc %s%
- copy an2to3.doc %s%
- copy describe.doc %s%
- copy register.doc %s%
- copy license.doc %s%
- copy outside.exe %s%
- copy read.me %s%
- copy printman.com %s%
- copy page.com %s%
- :126
- echo .
- echo We recommend that you put %s% in your DOS path and that ALARM be
- echo added to your AUTOEXEC.BAT file. Would you like us to do this for you?
- getans (Y,N)
- if not errorlevel 1 goto 10
- aninst -A %s%
- :10
- echo Ample Notice installation complete.
- :fin
-